home *** CD-ROM | disk | FTP | other *** search
/ Aminet 4 / Aminet 4 - November 1994.iso / aminet / comm / fido / fz104.lha / rexx / KillTicks.rexx < prev    next >
OS/2 REXX Batch file  |  1991-11-10  |  291b  |  20 lines
  1. /*
  2.  *
  3.  *    Deletes all messages coming from TICK
  4.  *
  5.  *    Installation:
  6.  *      - Fzi --> External
  7.  *      - Enter "Sysop" as one of the special names and
  8.  *        use the command "rx KillTicks %m"
  9.  *
  10.  */
  11.  
  12. parse arg MsgBuffer
  13.  
  14. From = import(x2c(MsgBuffer))
  15.  
  16. if left(From,4) = "TICK" then exit 0
  17.  
  18. exit 5
  19.  
  20.